(_start): Force system calls accessing unmounted devices to fail

without prompting.

diff --git a/src/unexw32.c b/src/unexw32.c
index 2363e7e73d070c9b67174f71a20f048936515675..f7314e79207a27d3702f1c8cc4bbf3099f4cf88c 100644 (file)
--- a/src/unexw32.c
+++ b/src/unexw32.c
@@ -155,6 +155,10 @@ _start (void)
      having us exit.  */
   SetConsoleCtrlHandler ((PHANDLER_ROUTINE) ctrl_c_handler, TRUE);
 
+  /* Prevent Emacs from being locked up (eg. in batch mode) when
+     accessing devices that aren't mounted (eg. removable media drives).  */
+  SetErrorMode (SEM_FAILCRITICALERRORS);
+
   /* Invoke the NT CRT startup routine now that our housecleaning
      is finished.  */
 #ifdef HAVE_NTGUI